package com.owen.he.jee.utils;

import java.text.ParseException;
import java.text.SimpleDateFormat;
import java.util.Calendar;
import java.util.Date;
import java.util.GregorianCalendar;
import java.util.Locale;
import java.util.regex.Pattern;

/**
 * <p>
 * 类说明:身份证合法性校验
 * </p>
 * <p>
 * --15位身份证号码：第7、8位为出生年份(两位数)，第9、10位为出生月份，第11、12位代表出生日期，第15位代表性别，奇数为男，偶数为女。
 * --18位身份证号码
 * ：第7、8、9、10位为出生年份(四位数)，第11、第12位为出生月份，第13、14位代表出生日期，第17位代表性别，奇数为男，偶数为女。
 * </p>
 * <p>
 * 判断18位身份证的合法性
 * </p>
 * 根据〖中华人民共和国国家标准GB11643-1999〗中有关公民身份号码的规定，公民身份号码是特征组合码，由十七位数字本体码和一位数字校验码组成。
 * 排列顺序从左至右依次为：六位数字地址码，八位数字出生日期码，三位数字顺序码和一位数字校验码。
 * <p>
 * 顺序码: 表示在同一地址码所标识的区域范围内，对同年、同月、同 日出生的人编定的顺序号，顺序码的奇数分配给男性，偶数分配 给女性。
 * </p>
 * <p>
 * 1.前1、2位数字表示：所在省份的代码； 2.第3、4位数字表示：所在城市的代码； 3.第5、6位数字表示：所在区县的代码；
 * 4.第7~14位数字表示：出生年、月、日； 5.第15、16位数字表示：所在地的派出所的代码； 6.第17位数字表示性别：奇数表示男性，偶数表示女性；
 * 7.第18位数字是校检码：也有的说是个人信息码，一般是随计算机的随机产生，用来检验身份证的正确性。校检码可以是0~9的数字，有时也用x表示。
 * </p>
 * <p>
 * 第十八位数字(校验码)的计算方法为： 1.将前面的身份证号码17位数分别乘以不同的系数。从第一位到第十七位的系数分别为：7 9 10 5 8 4 2 1
 * 6 3 7 9 10 5 8 4 2
 * </p>
 * <p>
 * 2.将这17位数字和系数相乘的结果相加。
 * </p>
 * <p>
 * 3.用加出来和除以11，看余数是多少？
 * </p>
 * 4.余数只可能有0 1 2 3 4 5 6 7 8 9 10这11个数字。其分别对应的最后一位身份证的号码为1 0 X 9 8 7 6 5 4 3 2。
 * <p>
 * 5.通过上面得知如果余数是2，就会在身份证的第18位数字上出现罗马数字的Ⅹ。如果余数是10，身份证的最后一位号码就是2。
 * </p>
 */
@SuppressWarnings({ "unchecked", "unused", "all" })
public class IDCardUtil {

    /**
     * 省，直辖市代码表： { 11:"北京",12:"天津",13:"河北",14:"山西",15:"内蒙古",
     * 21:"辽宁",22:"吉林",23:"黑龙江",31:"上海",32:"江苏",
     * 33:"浙江",34:"安徽",35:"福建",36:"江西",37:"山东",41:"河南",
     * 42:"湖北",43:"湖南",44:"广东",45:"广西",46:"海南",50:"重庆",
     * 51:"四川",52:"贵州",53:"云南",54:"西藏",61:"陕西",62:"甘肃",
     * 63:"青海",64:"宁夏",65:"新疆",71:"台湾",81:"香港",82:"澳门",91:"国外"}
     */
    private final static String codeAndCity[][] = { { "11", "北京" },
            { "12", "天津" }, { "13", "河北" }, { "14", "山西" }, { "15", "内蒙古" },
            { "21", "辽宁" }, { "22", "吉林" }, { "23", "黑龙江" }, { "31", "上海" },
            { "32", "江苏" }, { "33", "浙江" }, { "34", "安徽" }, { "35", "福建" },
            { "36", "江西" }, { "37", "山东" }, { "41", "河南" }, { "42", "湖北" },
            { "43", "湖南" }, { "44", "广东" }, { "45", "广西" }, { "46", "海南" },
            { "50", "重庆" }, { "51", "四川" }, { "52", "贵州" }, { "53", "云南" },
            { "54", "西藏" }, { "61", "陕西" }, { "62", "甘肃" }, { "63", "青海" },
            { "64", "宁夏" }, { "65", "新疆" }, { "71", "台湾" }, { "81", "香港" },
            { "82", "澳门" }, { "91", "国外" } };

    private final static String cityCode[] = { "11", "12", "13", "14", "15",
            "21", "22", "23", "31", "32", "33", "34", "35", "36", "37", "41",
            "42", "43", "44", "45", "46", "50", "51", "52", "53", "54", "61",
            "62", "63", "64", "65", "71", "81", "82", "91" };

    // 每位加权因子
    private final static int power[] = { 7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9,
            10, 5, 8, 4, 2 };

    /**
     * 验证身份证输入是否合法
     *
     * @param idcard
     *            身份证号码，支持15位和18位
     * @return true:合法 false:不合法
     */
    public static boolean isValidatedIdcard(String idcard) {
        if (isIdcard(idcard)) {
            if (idcard.length() == 15) {
                idcard = convertIdcarBy15bit(idcard);
            }
            return isValidate18Idcard(idcard);
        } else {
            return false;
        }

    }

    private static boolean isValidate18Idcard(String idcard) {
        // 非18位为假
        if (idcard.length() != 18) {
            return false;
        }
        // 获取前17位
        String idcard17 = idcard.substring(0, 17);
        // 获取第18位
        String idcard18Code = idcard.substring(17, 18);

        String checkCode = getCheckCode(idcard17);

        if (null == checkCode) {
            return false;
        }
        // 将身份证的第18位与算出来的校码进行匹配，不相等就为假
        if (!idcard18Code.equalsIgnoreCase(checkCode)) {
            return false;
        }

        return true;
    }

    /**
     * 验证15位身份证的合法性,该方法验证不准确，最好是将15转为18位后再判断，该类中已提供。
     *
     * @param idcard
     * @return
     */
    private boolean isValidate15Idcard(String idcard) {
        // 非15位为假
        if (idcard.length() != 15) {
            return false;
        }

        // 是否全都为数字
        if (isDigital(idcard)) {
            String provinceid = idcard.substring(0, 2);
            String birthday = idcard.substring(6, 12);
            int year = Integer.parseInt(idcard.substring(6, 8));
            int month = Integer.parseInt(idcard.substring(8, 10));
            int day = Integer.parseInt(idcard.substring(10, 12));

            // 判断是否为合法的省份
            boolean flag = false;
            for (String id : cityCode) {
                if (id.equals(provinceid)) {
                    flag = true;
                    break;
                }
            }
            if (!flag) {
                return false;
            }
            // 判断是否为合法的省份
            Date birthdate = null;
            try {
                birthdate = new SimpleDateFormat("yyMMdd", Locale.getDefault())
                        .parse(birthday);
            } catch (ParseException e) {
                e.printStackTrace();
            }
            if (birthdate == null || new Date().before(birthdate)) {
                return false;
            }

            // 判断是否为合法的省份
            GregorianCalendar curDay = new GregorianCalendar();
            int curYear = curDay.get(Calendar.YEAR);
            int year2bit = Integer.parseInt(String.valueOf(curYear)
                    .substring(2));

            // 判断该年份的两位表示法，小于50的和大于当前年份的，为假
            if ((year < 50 && year > year2bit)) {
                return false;
            }

            // 判断是否为合法的月份
            if (month < 1 || month > 12) {
                return false;
            }

            // 判断是否为合法的日期
            boolean mflag = false;
            curDay.setTime(birthdate); // 判断是否为合法的日期
            switch (month) {
                case 1:
                case 3:
                case 5:
                case 7:
                case 8:
                case 10:
                case 12:
                    mflag = (day >= 1 && day <= 31);
                    break;
                case 2:// 判断是否为合法的日期
                    if (curDay.isLeapYear(curDay.get(Calendar.YEAR))) {
                        mflag = (day >= 1 && day <= 29);
                    } else {
                        mflag = (day >= 1 && day <= 28);
                    }
                    break;
                case 4:
                case 6:
                case 9:
                case 11:
                    mflag = (day >= 1 && day <= 30);
                    break;
            }
            if (!mflag) {
                return false;
            }
        } else {
            return false;
        }
        return true;
    }

    /**
     * 将15位的身份证转成18位身份证
     *
     * @param idcard
     *            需要转换的15位身份证号
     * @return 转换后的18位身份证号码，如果为null，表示转换失败
     */
    public static String convertIdcarBy15bit(String idcard) {
        String idcard17 = null;

        // 获取出生年月日
        String birthday = idcard.substring(6, 12);
        // 下面是判断添加哪一年
        Date birthdate = null;
        try {
            birthdate = new SimpleDateFormat("yyMMdd", Locale.getDefault())
                    .parse(birthday);
        } catch (ParseException e) {
            e.printStackTrace();
            return null;
        }
        Calendar cday = Calendar.getInstance();
        cday.setTime(birthdate);
        String year = String.valueOf(cday.get(Calendar.YEAR));

        idcard17 = idcard.substring(0, 6) + year + idcard.substring(8);

        String checkCode = getCheckCode(idcard17);

        // 获取和值与11取模得到余数进行校验码
        idcard17 += checkCode;

        return idcard17;
    }

    public static String getCheckCode(String idcard) {
        int bit[] = converToInt(idcard);
        int sum17 = getPowerSum(bit);
        // 获取和值与11取模得到余数进行校验码
        return getCheckCodeBySum(sum17);
    }

    /**
     * 15位和18位身份证号码的基本数字和位数验校
     *
     * @param idcard
     * @return
     */
    private static boolean isIdcard(String idcard) {
        return idcard == null || "".equals(idcard) ? false : Pattern.matches(
                "(^\\d{15}$)|(\\d{17}(?:\\d|x|X)$)", idcard);
    }

    /**
     * 数字验证
     *
     * @param str
     * @return
     */
    private static boolean isDigital(String str) {
        return str == null || "".equals(str) ? false : str.matches("^[0-9]*$");
    }

    /**
     * 数字验证
     *
     * @param str
     * @return
     */
    private static int getPowerSum(int[] bit) {

        int sum = 0;

        if (power.length != bit.length) {
            return sum;
        }

        for (int i = 0; i < bit.length; i++) {
            sum = sum + bit[i] * power[i];
        }
        return sum;
    }

    private final static String sum_checkCode[] = {

            "1", "0", "x", "9", "8", "7", "6", "5", "4", "3", "2", };

    /**
     * 将和值与11取模得到余数进行校验码判断
     *
     * @param checkCode
     * @param sum17
     * @return 校验位
     */
    private static String getCheckCodeBySum(int sum17) {
        return sum_checkCode[sum17 % 11];
    }

    /**
     * 将和值与11取模得到余数进行校验码判断
     *
     * @param checkCode
     * @param sum17
     * @return 校验位
     */
    private static int[] converToInt(String c) throws NumberFormatException {
        int[] a = new int[c.length()];
        int k = 0;
        for (int i = 0; i < c.length(); i++) {
            a[k++] = Integer.parseInt(String.valueOf(c.charAt(i)));
        }
        return a;
    }

    /**
     * 获得18年后的日期
     *
     * @param date
     *            指定日期
     * @param year
     *            添加年份
     */
    private static Date after18Year(Date date, int year) {
        Calendar calendar = Calendar.getInstance();
        calendar.setTimeInMillis(date.getTime());
        int currenYear = calendar.get(Calendar.YEAR);
        calendar.set(Calendar.YEAR, currenYear+year);

        return new Date(calendar.getTimeInMillis());
    }

    /**
     * 判断输入的身份证号码是否是成年人
     *
     * @param idcard
     * @return
     */
    public static boolean isAdult(String idcard) {
        if (idcard.length() == 15) {
            idcard = convertIdcarBy15bit(idcard);
        }
        // 获取出生日期
        String birthday = idcard.substring(6, 14);
        Date birthdate = null;
        try {
            birthdate = new SimpleDateFormat("yyyyMMdd", Locale.getDefault())
                    .parse(birthday);
        } catch (ParseException e) {
            e.printStackTrace();
        }

        Date curr = new Date();
        Date dateAdd18 = after18Year(birthdate, 18);

        if (dateAdd18.getTime() < curr.getTime()) {
            return true;
        } else {
            return false;
        }
    }

    public static void main(String[] args) {
        String card = "44522119931227452X";
        System.out.println(IDCardUtil.isValidatedIdcard(card));
        System.out.println(IDCardUtil.isAdult(card));
    }
}
